function boolean = isSimetric( pattern )
% ISSIMETRIC 
% Esta funcion recibe un patron y devuelve 1 si es simerico, 0 en caso
% contrarios

    global FALSE;

    len = length(pattern);
    j = 0;
    for i = 1:floor(len/2)
        if pattern(i) ~= pattern(len-j)
            boolean = FALSE;
            return;
        end
        j = j+1;
    end
    boolean = 1;

end

